home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Club 1997 April / Software of the Month Club 1997 April.iso / pc / dos / child / kcart / install.fil < prev    next >
Encoding:
Text File  |  1997-02-01  |  4.3 KB  |  217 lines
  1. BACKGROUND 31
  2. SHADOW ON
  3. BEEP ON
  4.  
  5. CALL KS_TITLE
  6. PAUSE 50
  7. CALL PROG_TITLE
  8. PAUSE 50
  9. TELESCOPE OFF
  10.  
  11. SPACE 2500
  12. :GET_TARGET
  13. DRIVE C 10 19 113 31 5 12 95     'wx,wy,wc,ic,mx,my,mc
  14. PATH \KCART 10 19 113 31 5 12 95
  15. EXIST ~1~2\*.*
  16. JUMP.NO CHK1
  17.  
  18. WINOPEN 0 20 113
  19. "The directory ~1~2 already exists! Are"
  20. "you sure you want to use this directory?  Y/N"
  21. ASK +47 +2
  22. WINCLOSE
  23. JUMP.NO GET_TARGET
  24.  
  25. :CHK1
  26. EXIST ~0\kcart40.001
  27. JUMP.YES COPY_FILE1
  28. DISK 0 kcart40.001 10 20 47
  29.  
  30. :COPY_FILE1
  31. COPY ~0\kcart40.001 ~1~2 10 20 113
  32. JUMP.FAIL INST_FAIL
  33.  
  34. EXIST ~0\kcart40.002
  35. JUMP.YES COPY_FILE2
  36. DISK 0 kcart40.002 10 20 47
  37.  
  38. :COPY_FILE2
  39. COPY ~0\kcart40.002 ~1~2 10 20 113
  40. JUMP.FAIL INST_FAIL
  41.  
  42. EXIST ~1~2\kcart.exe
  43. JUMP.YES OVRWRITE
  44.  
  45. :COPYFILES
  46. SHELL
  47.   "~1"
  48.   "cd ~2"
  49.   "copy /b kcart40.001+kcart40.002 kcart40.exe >NUL"
  50.   "del kcart40.001"
  51.   "del kcart40.002"
  52.   "kcart40"
  53.   "del kcart40.exe"
  54.  
  55. WINOPEN 0 20 113
  56. "Would you like to view the instructions"
  57. "for Kinder-Carton?  Y/N"
  58. ASK +29 +2
  59. WINCLOSE
  60. JUMP.NO PRINT_DOC
  61. VIEW ~1~2\kcart.doc 27 112
  62.  
  63. :PRINT_DOC
  64. WINOPEN 0 20 113
  65. "Would you like to print the instructions"
  66. "for Kinder-Carton?  Y/N"
  67. ASK +29 +2
  68. WINCLOSE
  69. JUMP.NO INST_OK
  70.  
  71. :PRINT_NOW
  72. WINOPEN 0 20 116
  73. ""
  74. "  Printing...  "
  75. ""
  76. PRINT ~1~2\kcart.doc
  77. WINCLOSE
  78. JUMP.FAIL PRN_ERR
  79. JUMP INST_OK
  80.  
  81. :PRN_ERR
  82. WINOPEN 0 12 112
  83. "Your printer is not responding.  Possible problems:"
  84. ""
  85. "   ■ Printer is not attached to LPT1"
  86. "   ■ Printer is not turned on"
  87. "   ■ Printer is out of paper"
  88. ""
  89. "Do you want to try to print again?  Y/N"
  90. ASK +42 +7
  91. WINCLOSE
  92. JUMP.YES PRINT_NOW
  93.  
  94. :INST_OK
  95. TELESCOPE ON
  96. WINOPEN 5 9 113
  97. " Installation was successful. Use the following commands "
  98. " to run KCART:"
  99. "       ~1"
  100. "       CD ~2"
  101. "       KCART"
  102. ""
  103. " If you are using Windows 3.1 or Win 95, you MUST exit"
  104. " windows before running this software. In Win 3.1 click"
  105. " File, then Exit Windows. If you are using Win 95, click"
  106. " the Start button, then Restart in MS DOS mode. You can"
  107. " not run this software by clicking the MS DOS icon in"
  108. " Windows.  If you experience a conflict with your sound"
  109. " card, see the KCART.DOC file for instructions."
  110. "                      Press ENTER..."
  111. WAIT +49 +20
  112. WINCLOSE
  113.  
  114. :THE_END
  115. WINCLOSE   'close title win1
  116. WINCLOSE   'close title win2
  117. END  'normal install
  118.  
  119. :KS_TITLE
  120. BORDER 0
  121. WINOPEN 2 2 53
  122. "          "
  123. "                              "
  124. "                              "
  125. "                              "
  126. "                              "
  127. "                              "
  128. "                              "
  129. "                              "
  130. "                              "
  131. "          "
  132. WINUPDATE +10 +3 58
  133. "K"
  134. WINUPDATE +11 +3 59
  135. "i"
  136. WINUPDATE +12 +3 60
  137. "d"
  138. WINUPDATE +13 +3 61
  139. "S"
  140. WINUPDATE +14 +3 62
  141. "t"
  142. WINUPDATE +15 +3 63
  143. "u"
  144. WINUPDATE +16 +3 49
  145. "f"
  146. WINUPDATE +17 +3 53
  147. "f"
  148. WINUPDATE +19 +3 58
  149. "S"
  150. WINUPDATE +20 +3 59
  151. "o"
  152. WINUPDATE +21 +3 60
  153. "f"
  154. WINUPDATE +22 +3 61
  155. "t"
  156. WINUPDATE +23 +3 62
  157. "w"
  158. WINUPDATE +24 +3 63
  159. "a"
  160. WINUPDATE +25 +3 49
  161. "r"
  162. WINUPDATE +26 +3 53
  163. "e"
  164. WINUPDATE +11 +5 48
  165. "10619 Ketch Rd."
  166. WINUPDATE +8 +6 48
  167. "Plain City, OH 43064"
  168. WINUPDATE +12 +7 48
  169. "614-873-1374"
  170. WINUPDATE +9 +8 48
  171. "VickiWatso@aol.com"
  172. WINUPDATE +5 +9 59
  173. "Educational Software 4 Kids"
  174. BORDER 1
  175. RETURN
  176.  
  177. :PROG_TITLE
  178. WINOPEN 42 5 95
  179. "                                "
  180. ""
  181. ""
  182. "Register KCART for $20.00 and"
  183. "receive all the voice files for"
  184. "the letter names and sounds,"
  185. "blends and digraphs, and numbers"
  186. "from 0 to 100. The shareware"
  187. "screens are also removed in the"
  188. "registered version."
  189. WINUPDATE +6 +2 91
  190. "Kinder-Carton v4.0sw"
  191. RETURN
  192.  
  193. :OVRWRITE
  194. WINOPEN 5 18 47
  195. "A previous version of this program was "
  196. "detected. Please enter Y in response to"
  197. "any overwrite messages you may see on"
  198. "the next screen.          Press [Enter]"
  199. WAIT +41 +4
  200. WINCLOSE
  201. JUMP COPYFILES
  202.  
  203. :INST_FAIL
  204. WINOPEN 0 13 112
  205. "THE INSTALLATION PROGRAM FAILED PRIOR TO COMPLETION"
  206. "Possible reasons:"
  207. ""
  208. "  ■ The floppy disk was removed prior to completion."
  209. "  ■ The floppy disk was damaged during shipping."
  210. "  ■ Your disk drive is out of alignment."
  211. ""
  212. "Please contact KidStuff Software.      Press [Enter]"
  213. WAIT +54 +8
  214. DELETE ~1~2\*.* 0 0 31
  215. RD ~1~2
  216. WINCLOSE
  217.